home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / 599.swf / scripts / frame_140 / DoAction.as
Text File  |  2006-01-17  |  442b  |  29 lines
  1. play();
  2. if("0" >= credit)
  3. {
  4.    gotoAndPlay(158);
  5.    call("deselect");
  6.    end = "1";
  7. }
  8. if(verdict ne "")
  9. {
  10.    tellTarget("/afis/" add verdict)
  11.    {
  12.       play();
  13.    }
  14. }
  15. list = "";
  16. i = "0";
  17. descard = "";
  18. while(i < "5")
  19. {
  20.    if(eval("hold" add (i + "1") add ":hold") == "0")
  21.    {
  22.       descard = descard add hand.substr(i * "3" + "1","3");
  23.       list = list add i;
  24.    }
  25.    i += "1";
  26. }
  27. listb = list;
  28. gotoAndPlay(139);
  29.